home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v9n17.arc / TRUE.SCR < prev    next >
Text File  |  1990-09-12  |  991b  |  34 lines
  1. NTRUE.COM
  2. A100
  3. JMP 170                  ;jump over data area to START
  4.  
  5. F 102 16F '$'
  6. E 150 'Bad parameter'
  7. E 160 'I need DOS 3!'
  8. A170
  9. MOV  AX,3000             ;:START
  10. INT  21                  ;get DOS version
  11. CMP  AL,3
  12. JAE  17E                 ;if it's 3 or greater, go to OK
  13. MOV  DX,160              ;otherwise complain and ..
  14. JMP  19C                 ;.. go to DONE
  15. XOR  BX,BX               ;:OK
  16. MOV  BL,[0080]
  17. ADD  BL,81               ;make filename on command line into
  18. MOV  BYTE PTR [BX],00    ;an ASCIIZ string
  19. MOV  SI,0082             ;point SI at filename
  20. MOV  DI,0102             ;point DI at result area
  21. MOV  DX,DI               ;point DX at result too
  22. MOV  AX,6000
  23. INT  21                  ;call true name function
  24. JNC  019C                ;If the call succeeded, goto DONE
  25. MOV  DX,0150             ;otherwise point to error message
  26. MOV  AX,0900             ;:DONE
  27. INT  21                  ;print the message pointed to by DX
  28. INT  20
  29.  
  30. RCX
  31. A3
  32. W
  33. Q
  34.